Лабораторная работа № 3

Задание

Разработать приложение, показывающее различные свойства формы, а также работу с главным меню (см. файл FormMenu_1.exe и рис. 1).

 

           

Рис. 1                                                                                                 Рис. 2

 

Этапы работы (после каждого этапа запускайте проект, чтобы увидеть результат):

1. Создайте папку Форма_Меню. Сохраните файлы в созданной папке следующим образом: модуль - Menu.pas, проект—FormMenu.dpr .

2. Задайте следующие свойства формы: Name - fmMenu, Caption - Свойства формы.

3. Разместите на форме компонент MainMenu, задайте ему имя mnmForm  и вызвав двойным щелчком Конструктор Меню, создайте в нем соответствующие пункты и подпункты (см. рис. 2, 3, 4 и таблицу):

Пункт / Подпункт	Имя
Размер
Увеличить	mnmUvelich
–
Уменьшить	mnmUmensh
Окно
Диалоговое	mnmDialog
Неизменяемые размеры	mnmSingle
Без границы	mnmNone
Панель инструментов	mnmInstr
Панель инструментов (изменяемая)	mnmInstrSize
Обычная	mnmStand
Выход	mnmExit

Для пунктов Увеличить и Уменьшить задайте «горячие клавиши».

                         

Рис. 3                                                                                       Рис. 4

 

3. Для пункта Выход создайте метод завершения работы, в котором используется стандартная процедура завершения работы приложения:

Application.Terminate;

4. Разработайте для пунктов меню Размер соответствующие методы увеличения и уменьшения размеров окна (формы). Для этого:

1) в начале исполняемой части модуля (раздел implementation опишите константу D, которая равна шагу изменения размера окна;

2) используйте свойства Left (слева), Top (сверху), Height (высота) и Width (ширина);

3) учитывайте, что окно должно изменять размеры, не изменяя своего положения на экране, т.е. воображаемая точка центра окна должна оставаться на месте;

4) в тексте процедуры используйте оператор присоединения для формы fmMenu.

5. Для каждого из пунктов меню Окно разработайте метод, который задает соответствующий стиль границы окна.

6. Обратите внимание на то, что при выборе пункта Диалоговое главное меню пропадает и единственное, что можно сделать - закрыть приложение. Чтобы можно было продолжить работу и вернуться, например, к виду Обычная, добавьте на форму кнопку btStand (см. файл FormMenu_2.exe и рис. 5).

 

Рис. 5

 

В свойстве кнопки Visible задайте значение False (при запуске приложения кнопка не будет видна). Измените проект следующим образом:

1) добавьте в метод для пункта Диалоговое оператор, который сделает кнопку видимой;

2) задайте для кнопки btStand метод, который задает обычный вид формы, а затем делает кнопку невидимой.

7. Разместите на форме компонент PopupMenu (всплывающее меню), назовите его pmMenu. Используя Конструктор меню включите в него пункты (см. таблицу и рис. 6):

     Рис. 6

 

Каждому из трех пунктов меню сопоставьте методы, которые уже были созданы для соответствующих пунктов главного меню. Для этого в Инспекторе Объектов на странице Events (События) для события OnClick каждого пункта из списка созданных ранее методов выберите нужный. Затем для свойства PopupMenu формы задайте значение pmMenu.